home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr10 / tvprompt.zip / SCREEN.LIB < prev    next >
Text File  |  1992-03-09  |  512b  |  16 lines

  1. package Screen is
  2.  
  3.   Copyright: constant String := "Copyright 1991,92 Tom Moran";
  4.   subtype Scrollable_Strings is String(1 .. 20);
  5.   Initial_Scroll_Passage_Time: constant Duration := 10.0;
  6.  
  7.   task Scroller is
  8.     entry Start_Up;
  9.     entry Adjust_Speed(Scroll_Passage_Time: in Duration); -- 0.0 -> pause
  10.     entry Put(S              : in Scrollable_Strings;
  11.               White_On_Black : in Boolean := False);
  12.     entry Wind_Up;
  13.   end Scroller;
  14.  
  15. end Screen;
  16.